home *** CD-ROM | disk | FTP | other *** search
/ Cubase Magazine 52 / Issue #52.iso / pc / 2-SOFTWARE / MQv8Demo / MQ.Z / PatchBankMacros.txt < prev    next >
Encoding:
Text File  |  1999-03-01  |  2.8 KB  |  156 lines
  1. Patch.Bnk Receive Macro
  2. -----------------------
  3. * receive the data in high memory and then move to lower in a
  4.   format that allows for Bank editing
  5.  
  6.  
  7. GP 41920 
  8.  
  9. mz = 0 
  10. L 2 [ 
  11.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  12.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000 
  13.   S 5 { F0 43 20 9 F7 } TR 5 R 4104 D 1000 
  14.   mz + 1 ] 
  15.  
  16. mz = 0 
  17. L 2 [ 
  18.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  19.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000  
  20.   S 5 { F0 43 20 6 F7 } TR 5 R 1128 D 1000 
  21.   mz + 1 ] 
  22.  
  23. mz = 0 
  24. L 2 [ 
  25.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  26.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000  
  27.   S 15 { F0 43 20 7E 4C 4D 20 20 46 4B 53 59 43 20 F7 } TR 15 R 16165 D 1000 
  28.   mz + 1 ] 
  29.  
  30. GP 0
  31.  
  32. mv0 = 0
  33. mv1 = 41926 
  34. L 2 [
  35.   mz = 0
  36.   L 32 [
  37.     mw = z mw * 655 mw + v0
  38.     my = z my * 128 my + v1
  39.     gc y w 128 
  40.     mz + 1 ]
  41.   mv0 + 20960
  42.   mv1 + 4104
  43.   ]
  44.  
  45. mv0 = 128
  46. mv1 = 50134
  47. L 2 [
  48.   mz = 0 
  49.   L 32 [
  50.     mw = z mw * 655 mw + v0
  51.     my = z my *  35 my + v1
  52.     gc y w 35 
  53.     mz + 1 ]
  54.   mv0 + 20960
  55.   mv1 + 1128
  56.   ]
  57.  
  58. mv0 = 163
  59. mv1 = 52400
  60. L 2 [
  61.   mz = 0 
  62.   L 32 [
  63.     mw = z mw * 655 mw + v0
  64.     my = z my * 505 my + v1
  65.     gc y w 492 
  66.     mz + 1 ]
  67.   mv0 + 20960
  68.   mv1 + 16165
  69.   ]
  70.  
  71. GP 84714
  72.  
  73.  
  74.  
  75. Patch.Bnk Transmit Macro
  76. ------------------------
  77.  
  78. * copies the work area into the upper area that is used for
  79.   transmission then the data is sent
  80. * the macros should be identical except that w and y are
  81.   reversed in the GC macro
  82.  
  83. mv0 = 0
  84. mv1 = 41926 
  85. L 2 [
  86.   mz = 0 
  87.   L 32 [
  88.     mw = z mw * 655 mw + v0
  89.     my = z my * 128 my + v1
  90.     gc w y 128 
  91.     mz + 1 ]
  92.   mv0 + 20960
  93.   mv1 + 4104
  94.   ]
  95.  
  96. mv0 = 128
  97. mv1 = 50134
  98. L 2 [
  99.   mz = 0 
  100.   L 32 [
  101.     mw = z mw * 655 mw + v0
  102.     my = z my *  35 my + v1
  103.     gc w y 35 
  104.     mz + 1 ]
  105.   mv0 + 20960
  106.   mv1 + 1128
  107.   ]
  108.  
  109. mv0 = 163
  110. mv1 = 52400
  111. L 2 [
  112.   mz = 0 
  113.   L 32 [
  114.     mw = z mw * 655 mw + v0
  115.     my = z my * 505 my + v1
  116.     gc w y 492 
  117.     mz + 1 ]
  118.   mv0 + 20960
  119.   mv1 + 16165
  120.   ]
  121.  
  122.  
  123. GP 41920 
  124.  
  125. mz = 0 
  126. L 2 [ 
  127.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  128.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000 
  129.   FA 6 0 { F0 43 0 9 20 0 } K 0 0 6 4096 4102 MX = 247 FX 4103 T 4104 
  130.   mz + 1 D 1000 ]  
  131.  
  132. mz = 0 
  133. L 2 [ 
  134.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  135.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000 
  136.   FA 6 0 { F0 43 0 6 8 60 } K 0 0 6 1120 1126 MX = 247 FX 1127 T 1128 D 1000 
  137.   mz + 1 ] 
  138.  
  139. mz = 0 
  140. L 2 [ 
  141.   S 7 { F0 43 10 19 4C 0 F7 } fz 5 T 7 D 1000  
  142.   S 7 { F0 43 10 19 4d 0 F7 } fz 5 T 7 D 1000 
  143.   FA 4 0 { F0 43 0 7E } 
  144.   MW = 6 
  145.   MX = 508 
  146.   L 32 [ 
  147.     MY = W MY - 2 
  148.     FA 12 Y { 3 76 4C 4D 20 20 46 4B 53 59 43 20 } 
  149.     K 0 0 W 502 X 
  150.     MW + 505 MX + 505 ] 
  151.   MX = 247 FX 16164 T 16165 
  152.   D 1000 
  153.   mz + 1 ]
  154.  
  155.  
  156.